bilev "l31=(nsdone+ds)%32+1"
1 pcpd*1.500:0
  lo to 1 times l31
2 pcpd*3:180
  pcpd*4:0
  pcpd*2:180
  pcpd*3:0
  pcpd  :180
  pcpd*2:0
  pcpd*4:180
  pcpd*2:0
  pcpd*3:180
  pcpd*3:0
  pcpd*4:180
  pcpd*2:0
  pcpd*3:180
  pcpd  :0
  pcpd*2:180
  pcpd*4:0
  pcpd*2:180
  pcpd*3:0
  pcpd*3:0
  pcpd*4:180
  pcpd*2:0
  pcpd*3:180
  pcpd  :0
  pcpd*2:180
  pcpd*4:0
  pcpd*2:180
  pcpd*3:0
  pcpd*3:180
  pcpd*4:0
  pcpd*2:180
  pcpd*3:0
  pcpd  :180
  pcpd*2:0
  pcpd*4:180
  pcpd*2:0
  pcpd*3:180
  jump to 2
